Disable hack for echo area

Seems to cause more problems (like completion commands sometimes being
overwritten) than it solves.

diff --git a/which-key.el b/which-key.el
index f77d7256cf24a51ded4b4cd9e916d8b03a23782e..d7cee3ff4ead2de4df554425dde275119a9a1161 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -1656,18 +1656,21 @@ is the width of the live window."
     (setcar (cdr (assq 'which-key-mode minor-mode-alist)) which-key--lighter-backup)))
 
 (defun which-key--echo (text)
-  "Echo TEXT to minibuffer without logging.
-Slight delay gets around evil functions that clear the echo
-area."
+  "Echo TEXT to minibuffer without logging."
   (let* ((minibuffer (eq which-key-popup-type 'minibuffer))
-         (delay (if minibuffer
-                    0.2
-                  (+ (or echo-keystrokes 0) 0.001)))
+         ;; (delay (if minibuffer
+         ;;            0.2
+         ;;          (+ (or echo-keystrokes 0) 0.001)))
          message-log-max)
     (unless minibuffer (message "%s" text))
-    (run-with-idle-timer
-     delay nil (lambda () (let (message-log-max)
-                            (message "%s" text))))))
+
+    ;; Caused some completion commands in the minibuffer to be overwritten, so
+    ;; disable the hack for now
+
+    ;; (run-with-idle-timer
+    ;;  delay nil (lambda () (let (message-log-max)
+    ;;                         (message "%s" text))))
+    ))
 
 (defun which-key--next-page-hint (prefix-keys)
   "Return string for next page hint."